EROS 2/EROS 2.iso/mac/EROS vol.2/EROS vol.DXR/00134.ls

Text File | 1995-12-20 | 373 b | 17 lines

on mouseUp
  m4()
end

on rrr
  global md1, rantime, mp
  set rantime to the ticks
  set mp to 4
  if the castNum of sprite 4 = 170 then
    set the castNum of sprite 4 to 164
    set md1 to the duration of cast 164 - 3
  else
    set md1 to the duration of cast (the castNum of sprite 4 + 1) - 3
    set the castNum of sprite 4 to the castNum of sprite 4 + 1
  end if
end